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HATA GH 


Newsletter of the Rochester, NY AerGent “CE 


Compucoior Users Group 


Summer is over. Here in Rochester, the snow has begun to fall (or 
Maybe it just seems that way). Computing season is almost upon us 
again. Although some people compute all the time (see the article 
clipped from Time magazine on page 23), your editor is primarily a 
foul weather computor, preferring other activities in the warm 
season. (No, nude sunbathing is not one of them.) 


Our new librarian has been busy (see his report on page 12), and 
he'll be even busier - we've received 15 disks full of programs 
from CUVIC (Compucolor Users in Victoria, Australia) for our 
library. I ran a few of them last night. They're great! Our thanks 
to Keith Ochiltree for putting it together for us. (He's their ex- 
librarian.) 


Doug Van Putte's 3-D graphics programs published in Colorcue a 
couple of issues back have been translated to Fortran by Howard 
Rosen; they start on page 6. Howard also has included.some other 
routines as well, so all you Fortranners snould be ecstatic. By 
the way, are there any FORTH people out thewre who'd like to write 
something? Jim Minor's adaptation of FORTH for the CCII has been 
around and distributed for some time now. Let's hear from you. 


We're hearing from Jim, who's submitted an article about a 
neat/clean way to get single character answers .to BASIC questions. 
(See page 3.) 


Myron Steffy reports on a bug found in the program he published in 
DATACHIP 31 (page 15), amd page 24 contains an advertisement for 
the Australian music synthesizer reveiwed in the last issue of 
FORUM. 


If you're clever, you've noticed that you've just read the index 
to this issue, with some extra verbage (ver=gar?). So be it. 
Onward. 


Membership Librarian Editor 

Gene Bailey i Doug Van Putte Ben Barlow 
28 Dogwood Gien 18 Cross Bow Dr. 161 Brookside 
14625 14624 14618 


(All Rochester ) 


ANNOUNCING!!! 


A series of 2-4 FREE sessions on advanced RASIC will be 
given during the reqular CHIF meetings beginning in 
= - Each sessian will last 29-30 minutes. 


The topics will cover all aspects of KRASIC from 
input/output to machine-language interfacing, FCS, and 
graphics. The first two sessions will concentrate on BASIC 
commands with emphasis on items buried in the Frogramming 
Manual plus items the Manual never mentioned. In addition, 
participants will learn how to write more efficient 
programs that run faster and take up less memory. Special 
tricks and techniques will be added to teach flexibility in 
programming and to allow the user to do things he never 
thought possible in BASIC. Farticipants will also be given 
problems to try out on their own (answers at the following 
session). 


Following the series a complete set of notes will be 
available for the cost of photo-copying and postage (if 
applicable). 


For more information contact: 

Rick Taubold 

197 Hollybrook Road 

Rochester, NY 14623 

Work phone (7146) 275-5948 (anytime during the day) 


Home phone (before Sept. 1): (716) 334-322 
(after Sept. 1): (716) 271-7962 


SINGLE-CHARACTER ACCEPTANCE ROUTINE < SCAR) 


be Jim Minor 


It freauentily arises in writing 3 Frosram that there sre instances 
in that rrogrsam where one wishes to have the user of the erosrem 
resrond to 3 simple auestion. For instances 


OUTPUT TG SCREEN OR PRINTER 7? _ 


where the ’S’ in screen sand the ’P’ in fFrinter are of 3 different 
color than the rest of the text or are blinkins (or both) toa indicete 
sou want en “S’ or ‘PF’ resronse,. 


The most obvious wey to implement this in BASIC is with the stetement:? 
1000 INPUT "GQUTPUT TO SCREEN GR PRINTER ? "5 At 


which will return (uron user entry) the user’s resranse es the string: 
Although simples this has (to my was of thinking) twa shortcomings? 


L. The RETURN Kes must be struck to complete entry and for 
multiple entries this becomes tediaus. 


J 


The statement does not check for nonvalid resronses, @.8. 
in the sbove case whst would harren in the rest of the 
Program if "V" were enteredT 


t- 


These shortcomings can be overcome bys writings = custom frasram for 
esch inrut using the Last Kes Code ‘LKC) send KevBosard CHAracter 
CKRCHA) system RAM locations. However? en easier metnod is ta @ 

the herein-listed Sinsle-Chsarscter Accertsance Routine to sour frosrsm 
and invoke it es follows? 


L. List the accertsable chsracter set 68 8 concstensted {i.e. one 
character followins snother) strings SS#» in ens order. 
For the exemrle given sbove use SS$="SF" or "SS#"= "FS", 


2. Print sour Fromret followed by 3s semicolon ‘to Keer the cursor 
on the same line): e.8. for cur exemrie? 


PRINT "GUTPUT TG SCREEN OR FRINTER 7 "3 


3. Invoke the subroutine vist GOSUR 50999 


$4. The resronse (S or P for this exsmrle) is returned es ’5#° 
Eecy 


so if sour fFrosrsm will use it as ‘A$’ tor you want to seve 
the resronse but still be sble to call the SCAR subroutine 
before sou’re throush usins the Frevious resronse) then: for 


examelesy simrly set A$=SE. 


‘AS’. 


This 3ll may be sccomrplished succinctls in one lines vizi 


1000 SS$=SPIPRINT" OUTPUT TG SCREEN GR PRINTER 7 "siGOSUB SO000TAS=Sh . 


The nice thing about this subroutine is that it cen be used severel 
times in different ways within 5 FProsrams i.e, 


700 SS$="O12345"PRINT"ENTER SELECTION (0-5)? "5 $GOSUR SOOOOTSES=5% 
800 SS$="YN" tPRINT"WILL YOU HE USING A PRINTER T "SiGOSUER SOO00tP$=5% 
1000 SS$="SP" tPRINT"OUTPUT TO SCREEN GR PRINTER fF "$iGOSUB SOO0OtSPS=S% 


The routine works as follows. Line 50060 initializes the "valid 
input" flags STy to FALSE (i.e. 0). It then checks to see (via LKC) 
if se cherscter hes been entereds if not» it loors in 30070 until 

one is entered. OGnce 8 Key has been strucks the routine (59080) 
sets S$ eausl to the entered character (as obtsined in KECHA). 

The subroutine then comrsres (50080-50100) the entered character 
with 3l1 the characters in the sprroved charscter lists SS#. If 

S$ matches ans of the characters in this lists then the test fleas; 
STy is set TRUE (which in COMPUCOLORese is -1). If the secertence 
list was exhausted without findings 3 match with St» then ST will 
still be FALSE and line 50120 causes the chsracter on the screen 

to be erssed end causes the rrosram to loor back to wait for another 
Chorefulls valid) inreut Keystroke. Once s valid cheracter has been 
entered (ST=-i1» i.e. TRUE): then line 50130 comrletes the PRINTins 
of that line (rreviousls thwarted by the calling frosraem’s semicolon) 
and the valid character is returned to the callings erosrsm as ‘St’. 


Acourle of notes on usage. If sour Frosram is vers lons: the resranse 
time of this subroutine mas be unsccertsabls slow and sou mey find 

it sdventseseous to move the subroutine to the besinnins of your 

erosrem (e.s. subtrect 50000 from sll line numbers). If sour "chsrecter” 
list hss srecisal cherscters in its use the CHRS< ) function in creati 
S$S$. For instances if accertshle inruts sre Or Yr ‘ur srrow’s “4 
and ‘blink on’s then set 


sS& = "OY" + CHRS(28) + CHRS( 19) + CHRS( S51) 
where the numbers in the CHRS{ ) functions were obtsined from COMPUCOLOR’ s 
"\. 


"ASCII" list (cf. "COMPUCOLOR PROGRAMMING ANE REFERENCE MANUAL" >=. L112 


It onls takes 3 courle of minutes to enter the subroutine and ance 
sou do I think you’ll find it vers essy to use, 


s000D 

aa REM SINGLE-CHARACTER ACCEPTANCE ROUTINE ¢ SCAR) 
0020 

30030 REM SS% INPUT ACCEPTANCE LIST < CONCATENATER ) 
50040 REM $$ GUTPUT ACCEPTED VALUE 
30050 REM ST INTERNAL TEST FLAG (0="FALSE’, -i=" TRUE’ ) 
30060 ST = 0 {REM TEST NOT MET (YET) 

50070 IF PEEK( 33252) = 0 GOTO 50070 tREM “LKC’ CHECK 
50080 Sé = CHRS<PEEK( 33278)) tREM ASSIGNMENT FROM *“KBCHA’ 
50090 FOR SS = 1 TO LEN (SS$) . 
30100 IF S$ = MIIG(SS$,SSsi) THEN ST = -i 

S0L10 NEXT SS 

sO120 IF NOT ST THEN PLOT 24732726 {GOTO 30070 

50130 PRINT tREM FINISH LINE 

50140 RETURN 


ITEMS FOR SALE ‘ i 


KEYBOARD for CCII - standard model, good for a spare. $80. 


Norman Johnson, S/V Bandersnatch, Stono Marina 
John's Island, S.C. 29455 


CCII for sale — Mel Bomze (ad's with Colorcue stuff at other 
editor's house. If this is still here, it means I haven't 
gotten it back in time for printing. See Colorcue (Aug/Sept) or 
call Mel, who lives at 15 Maple Glen Lane, Nesconset, NY 11767. 
It's a good deal! y 


HOWARD ROSEN, FINO. 
xx COMPUTERS ** PRINTERS *x SOFTHARE xx 


P,Q, Box 404 Hamtinedon Valley, fa. 19906 phonet (215) 464-7145 


AUQUSt 1, 19682 


er Doug? 


T reall» got busy and finished the subroutines for 
figure drawing, When I compiled them (the five included) T 
called the .REL file DRWLIE. The MSin program whien 
uses the subroutines must have the correct arguments in tne 
calle to the JOT OULLMeS « Each suoroutine is feirly well 
dochmented + “ding the argume any 


To did find an error in one of my changes to Cherles 
JOsSepns proeram. The calls to XBAR are correct as Charles 
wrote them. My change was incorrect. 


tT am 
of $10.00, 


itlogimg & cneck pays 
27 M@ ups 


ole to CHIFS im the amount 


LT sell the following items in addition to the Tse 
Lirvs$ ; 
NEC, North Star, Televidea, AROS , Altos 
computers gnd computer systema. 

Epsors HEC, AMEX > Okidata, Treancdooms 
Axioms,  Inteogrex Color, & Computer Int’ 
Deisywriter printer 

ADDS ; Ame. » NEC, Sanyo, & Televiden 
Monitors & Terminals 
Axlom; Hayes, & Verntel MODEMS 


Tr any of your gcquegintances Nave meed 
thet List of manu Lures, To would be more t 
accomodate them in their purchase, 


Keep up tne @xcitineg activity with the 
tie COI. 


MOE Of 


Sincerely yours, 


vow eo 


Howard Ro 


FORTRAN~G0 VER» 3.34 COPYRIGHT 197» 791 90 (C) BY MICROSOFT —— BYTE 
SUBROUTINE TO INITIALIZE T-MATRIX & S1-HATRD 


i 

2 

3 C AUTHOR? HOWARD ROSEN BASED ON PROGRAM BY DOUG VAN PUTTE 
4 C BATE! 4-24-82 

3 Cc ARGUMENTS$ TS 

6 C TS? ARRAY 4X4 FOR EITHER T OR S MATRIX 
i Cc 

8 SUBROUTINE INITST( TS) 

9 DIMENSION TS{ 474) 

19 BG 2000 IR = 174 

11 NG 2000 IC = ir4 

12 TSC IRsIC) = 0,0 

13 2000 CONTINUE 

14 TH lei) = 1.9 

15 TS 272) = 1.0 

16 TS 393) = 1,0 

17 TS 424) = 1,0 

18 RETURN 

19 END 


PROGRAM UNIT LENGTH=O0AF (175) BYTES 
DATA AREA LENGTH=000D (13) BYTES 


SUBROUTINES REFERENCED? 


$Li $T1 

VAR TABLES: 

TS 0001" IR 0003” Ic 9005” 
T3000000 9007" = 3010000 9009" = T3020000 0008" 
LABELS 


2000L 0038’ 


1 C SUBROUTINE TO CREATE ROTATION T-MATRIX 
2 C 

3 C AUTHOR? HOWARD ROSEN BASED OF PROGRAM BY DOUG BAN FPUTTE 
4 c DATE? APRIL 247 1982 

3 C ARGUMENTS? SisA 

6 c Si ARRAY 3X3 FOR ILENTIFYING AXIS OSF ROTATION 
7 C AS ARRAY 3X3 CONTAINING ANGLE OF ROTATION IN DEGREES 
3 C 

? SUBROUTINE ROTATE( S1rA> 

10 DIMENSION I1(3)eT2¢3)2Si Ss de AC 3) eRALK 3) 

il DATA TAC de TAC 2 de TCS de T2C 1 e120 2)2IT 2B 3 )/isds2s20585/ 
12 Cc 

13 BO 1000 L = i+3 

14 C 

13 C CONVERT ACL) IN DEGREES TO RABIANS FOR THE COMPUTER 

1 C 

17 RAD(L) = ACL )¥3,14159/130,0 

13 IFCACL) .EQ. 0,0)60TO 1000 

19 c 

2 Tl = TlbL) 

vs TI2 = T2L) 

22 C 


23 SUTITirsIIL) = COSCA) 


24 SiC TTistI2) = -SINCA) 
20 SU TI2;TTL) = SINCA) 
28 $i TI2;1I2) = Cosa) 
a7 C 

23 1000 CONTINUE 

29 RETURN 

30 ENTE 


PROGRAM UNIT LENGTH=0133 (307) BYTES 
DATA AREA LENGTH=0036 (54) BYTES 


SUBROUTINES REFERENCED? 


cos SIN $Li 

She $08 $Ti 

ou? $NB 

VAR TABLES? 

$1 9001" A 9003” aE 0005" 

12 0008" RAL goti" L oo1n" 
T$000000 QO1F" 2010000 9021" = =T090002 9023" 
tii 0024" II2 0024" T3020000 0028" 
T3030000: OO2A" 73040000 9020" T3050000 002E" 
T3050000 0030" 13070000 9032" = T3080000 0034" 
LABELS: 

1Q90L O11’ 

1 SUBROUTINE TIMER( SECS) 

2 C 

3 C THIS SUBROUTINE PROVIDES A DELAY OF "SECS" SECONDS 

4 C 

3 C VERSIONS JULY 18% 1982 JJC 

4 C 

7? INTEGER BELTAsSECS 

8 Cc 

7 BYTE HReMINySEC 

10 C 

ii HR = PEEK( X’ S1BB’ ) 

2 MIN = PEEK( X’S1RA’ ) 

13 SEC = PEEK(X’8189" ) 

14 Cc 

15 C STARTING TIME 

i) STINE = 3600, * HR + 50, * MIN + SEC 

17 Cc 

13 1 HR = PEEK( X’ S1RB’ ) 

1? MIN = PEEK{ X’ 813A‘ ) 

20 SEC = PEEK{ X’SiR9’ ) 

21 Cc 

22 C PRESENT TIME 

2 PRESTM = 3600, * HR + 50. * MIN + SEC 

2 C 

235 DELTA = PRESTM - STINE 

2 IF(DELTA «LT. SECS )GOTO i 

2 C 

2 RETURN 


2? END 


PROGRAM UNIT LENGTH=O0E9 (233) BYTES 
DATA AREA LENGTH=0015 (21) BRYTES 


SUBROUTINES REFERENCEL: 


PEEK 
$T1 
$55 


VAR TABLES? 


SECS 
MIN 
73000001 


LABELS? 


a 
i 


OC CO™N OOS Ww Pe 


——28_____1000- 


29 
30 
31 


9001" 
0006" 


OOINOINNIOINAIAnoIaann 


2000 


$Li 
$AB 
$CH 
DELTA 00903” 
SEE 0007" 


900C" PRESTH 90010" 


SHA 
$AA 


HR 


STIME 
T3900002 


9005" 
9003" 


SUBROUTINE TO PLOT TRANSFORMED OBJECT (P’ ) 


AUTHOR! HOWARD ROSEN - BASED ON PROGRAM RY [DOUG VAN PUTTE 


DATE: 4-24-1982 


ARGUMENTS? DISPLYsNPTSsLNRyNReOFFSTXsOFFSTY 


BISPLY} THE P MATRIX 


NPTS$ NUMBER OF POINTS PER AXIS TO BE DISPLAYED 


LNR} LAST NUMBER RECORDED 


NRE NUMBER OF RECORDS FOR P 
OFFSTX; X-BISPLACEMENT FROM X 
OFFSTY: Y-DISPLACEMENT FROM Y 


nou 


0 
0) 


SUBROUTINE PLOTP( DISPLY sNPTSsLNReNR sOFFSTXsOFFSTY ) 
BYTE PMOLEs VECTORsENDPLT sDISPLY{ 42NPTS )sOFFSTXsOFFSTY yXs¥ 


DATA PHOBEs VECTORsENDPLT/2y 24 


X 
Y 


DISPLY( 1:1) + OFFSTX 
DISPLY{ 221) + OFFSTY 


WRITE( 3 PMONEsX2¥ 2 VECTOR 


HO 1000 IC = 2yLNR 

X = DISPLY(1/IC) + OFFSTX 
Y = DISPLY( 2710) + OFFSTY 
WRITE 3 Xr¥ 

CONTINUE whe: 
WRITE( 3 DENDPLT 

M=LNR + 1 


X = DISPLY( ts) + OFFSTX 
Y = BISPLY{ 294) + OFFSTY 
WRITE( 3 PMODEs Xs 7s VECTOR 


BO 2000 IC = MyNR 

X = DISPLY( 1/10) + OFFSTX 
Y = DISPLY( 2710) + OFFSTY 
WRITEC 3 )X2¥ 


CONTINUE 


= 
2 7 255/ 


WRITEC 3 DENDPLT 


RETURN 
ENE 


PROGRAM UNIT LENGTH=0187 (391) BYTES 
BATA AREA LENGTH=0024 (34) BYTES 


SUBROUTINES REFERENCED: 


$12 
su 

VARIABLES? 
DISPLY 0001" 
NR 0007" 
PHODE 000n" 
x 0010" 
T!000000 
LABELS? 
1000-0090’ 
1 e 

2 c 

3 c 

4 c 

5 c 

4 c 

7 c 

3. c 

9 c 

10 c 

it c 

i2 c 

13 c 

14 c 

15 c 

16 c 

17 c 

13 c 

19 c 

2 

2t 

22 c 

2 

2 

25 

2 

7 c 

2 c 

29 ¢ 

30 c 

31 c 

32 

33 1000 
34 

35 

34 c 


Qo1A” 


AUTHOR + 
BATE? 


$AT : $W2 

NPT 0003” LNR 9005" 
OFF TX 0009" , OFFSTY 900R" 
VEC OR OO0E" ENDPLT 000F” 
a ooti" Ic 9019" 
i oo1c” 


2000L 0155’ 


SUBROUTINE TQ MULTIPLY T-MATRIX & P-HATRIX 
AND TG 
CONSTRUCT & COMPOSITE TRANSFORM T-MATRIX 


HOWARD ROSEN - BASER ON PROGRAM BY [QUG VAN PUTTE 
4-24-1982 


ARGUMENTS? NRrJFLAG*ARAY1sARAY2 


NRE 
JFLAG? 
ARAYL 
ARAY 23 
$3 


FOR TXP; NUMBER OF RECORDS FOR P 

SET TG 0 FOR THPs SET TO 1 FOR S&T (COMPOSITE T) 
T-MATRIX FOR TXPs S-MATRIX FOR S4T 

P-MATRIX FOR TPs T-MATRIX FOR S&T 

SCALE FACTOR 


T-MATRIX I5 A 4X4 MATRIX FOR TRANSFORMING THE P OR S MATRIX 
P-MATRIX IS A 4XNR MATRIX REPRESENTING THE OBJECT 

S-MATRIX IS A 4XNR MATRIX FOR SCALING 

ARAYS IS A 4XNR TRANSFORMED P-MATRIX 


SUBROUTINE TMATRX( NRrJFLAGsARAY1 sARAY22SsARAY32 SCALE ) 
DIMENSION ARAYL 474 )sARAY24 49 NR 023k 42NR PARAYS( 49NR ) 


NG 2000 I = is4 
BO 2000 J = 1:NR 
SUM = 0+9 

DO 1000 K = 154 


EACH COMBINATION IS A SUM AND LATER BECOMES ANC 


SUM = SUM + ARAYI¢IsK) & ARAY2¢KrJ) 
CONTINUE 

IF( JFLAG .E8. 0)60TO 1500 

TEST = SUMKX2 


MATRIX ARITHMETIC IS THE SUM OF THE PRODUCTS OF A GIVEN ROW, COLUMN 
COMBINATION. 
OF ARAY3, THE TRANSFORMED P-MATRIX, 


ELEMENT 


10 


37 C NO POINT LETTING ANY ELEMENT OF THE ARRAY BECOME TOO SHALL. 


38 c 
49 1500 


41 2000 
42 C 


49 30090 


IF( TEST 
ARAYS( Is 
CONTINUE 


DO 3000 
BO 3000 
DUMMY = 
EINTA = 


ARAYS{ IyJ) = FLOAT{ INTA) 


CONTINUE 
RETURN 
END 


* 
wwe 


+ 0.9 
J) = SUH 


I 1s4 
J = L:HR 
ARAY 3¢ IyJ } 


O01 SUH = 9.9 


{DUMMY + 0.5)/SCALE 
INTA = IFIX{ EINTA) 


PROGRAM UNIT LENGTH=O1AD (429) RYTES 
DATA AREA LENGTH=002E (44) BYTES 


SUBROUTINES REFERENCED Y 


IFIX 

$L1 

$AB 

$05 

VARTABLES? 

NR 9001" 
ARAY2 0007" 
SCALE 00D" 
SUM 0013" 
T3010000 

TEST 0020" 
INTA 902C" 
LABELS? 

2000L OOFC’ 
3000L Q17F’ 


901B" 


FLOAT 

$Tt 

$EA 

JFLAG 0003" 
$ 9009" 
1 Q00F" 
K 0017" 
T$020000 


DUMMY 0024” 


1000L = 007F’ 


0012" 


$AT 
SMB 
$SB 


ARAYL 9005" 
ARAYS 0008" 
J 9011" 
T3000000 
T?900002 
EINTA 0029" 


1S500L 900’ 


0019" 
OOLF" 


Doug Van Putte 


As your new librerians I wish to besin my first. rerort by 
SALUTING David Suits: your retired librarians for his many 
crestive contributions. Dave leaves us for other contributions 
with 3 library with good contents a sound systems and things 
under control. Thanks from the entire CHIF membershir,s Dave. 


Mu practice will be to create a number of disks with 
tories and fill in the blanks with errrorriste rraosrams as they 
arrive. Most of the new disk content comes from Devid’s holding 
filer 3 number of which came from the 40 Intecolor disks our 
srour received from 3a donor who will remain snonomous. Since 
only about 10 of these disks have been converted to single 
density: we can only guess at what other gems await us. There 
is an established practice for conversion; so I challenge each 
of you to get the instructions from Gene Bailey end convert 
some of this collection for the CHIP grour. I will categorize 
and add them to the library. My thenks to my sable assistant, 
Rick Taubolds for debugsing end assessing. some of the new 
programs. - f 


Other rfrosrams on the new disks are from both domestic and 
foreisn members who contributed them es they made reauests. 
Review the new disks under develorment and contribute one of 
yours to an unfinished disk. I can’t rromise that they will all 
be incorroreted: but think of the expansion rossibilities if I 
get contributions with eech reauest. 


The completed disks listed below ere aveileible forthwith. 
Please ask for complete disks: not programs. Surely me with 
your formatted disks and First Class or Air Mail rostese slong 
with your reauest. Otherwise send 2 $5 checks rPayshle to CHIF: 
for each disk remuest not sccomeenied by a disk. The Fartisl 
disks under development will be available ses soon as I. set Lie 
necessary contributions. Look for en urdste of the lLibrery 
listing in 3 future DATA CHIP. You seer new meterisl reslly 
does derend uron you! Complete library listings are elso 


available on reauest. Send a self adressed: stemred envelore 
to assist me in rerlying auickly, 


Since CHIF has officially embraced NEC as well és 
INTECOLOR: I look. forward to having library assistants in botn 
areas. Any volunteers? We have been offered assistance in 
Program conversion in either direction if incentive is needed, 


Nake sure you sre 3a member of sood standing when you send 
ae reauest. If your membershir hes exrired (it hes if you neve 
not antied-ur in 1982) or you wish to become = new members, 
include a check for $10 payable to CHIF:s with your reauest- 


‘ve 


DISK 54 Games ( Complete) 

RUBIC’S CUBE. This cube program solves vour cubes 65 well es 
Plays the game. This is Roger Sefford’s Frogram from vets 
#4, COLORCUE. 

CANYON, Another Safford program which reeuires you to build 2 
bridse over 8 canyon. é : 

TEASER. Solve the 3x3 Sauare. R. Safford. 

KENO. Some say it’s Jjust like the casino seme, 


DISK 35 Utilities (Complete) 
“MULTI-COPY DISK COPIER (32K). Cory the same disk many times 
without a hassle. J.J. Charles. 
LIST DIRECTORIES ON F INTER. For a2 concises hard summery of 3 
set of directories, J.J. Charles. 
DIRECTORY ALPHABETIZA. ION. Losing track of the location of 2 
seldom used program? J.J. Charles helres you set orgsnized. 
TINYC PLOT FUNCTIONS. Tom Montemarano gives us Besic Flot 
_ functions in TINYC. A BASIC file explains all. 
SCREEN SAVE UTILITY. A display manager by A. Grosono 
DISASSEMBLER. A BASIC Frogram with different features: 
including 2 rrinter version. 
LABEL. A simple Label maker for one vertical set of labels, 
Could be easily expanded. 


DISK 54 Educational (Under develorment ) 

3-0l OBJECT MANIPULATION. From COLORCUE v.4s #42 this rrogrem 
demonstrates the basic orerations of manirulating 3-0 
obJects. You can substitute your own object. D. Van Putte, 

STARS. Plots the relationship of sters in space. Converted 
from PERSONAL. COMPUTING by J.J. Charles Jr. & Sr. 

MATRIX INVERSION. A FORTRAN Program converted to BASIC by 
J.J+ Charles to invert a matrix. Includes en exaemele. 

CALCULATOR. An RPN calculetor simuletor. 6/78 & 8/79 


DISK 57 Business (Under develorment ) 

ANNUITY CALCULATION. Calculates the value of an ennuitsy for 
each veer for 30 veers considering both the interest rate 
‘and the inflation rate. J.J. Charles. 

NEW ANNUITY. Fred Hudson’s frodgrem helrs you determine the 
unknown interest rates of competing annuities. 


DISK 58 Novelty (Under develorment ) 

CRYPTOGRAM AID, Need to decifer s coded messege? RK. Safford’s 
Program may hele you find the tressure,. 

HORSE RACE ANALYZER. Bet on the horses? This gem by John 
Poremba considers more then chance. By the wayr no warrenty 
of success of sny Kind is implied if you use this Frosrem, 

COCKTAIL RECIPES. Tyres of beverasess ingredients: and tirs 
are included in this CCII adertstion by R. Cowling. 


PS 


DISK 59 Games ( Complete) = 
ADVENTURE. Revised edition of DISK 20. 
WUMPUS II. Revised edition of WUMFUS on DISK 3, 
COVER. Uemonstreates. use of dual Joysticks. S. Ferriss. 
JOYSNAKES. Snakes for two Jjovusticks. S. Perrigo. 
SOUND. mound Patch for SERNER Es. From S. Ferrisgo. 


BISK. 60 Bones (Under Ravelorasrti 5 
“SPACE WAR. Unknown piece for disital Jjousticks.. : 
ACEY BDUCEY. CCII version of the card game by J. Van Loan 
from CREATIVE COMPUTING. 
PYRAMID SOLITAIRE.- A Don Miller card same, 
ANDROID ELIMINATIONC 32K). Outsmert the computer in “rubbing 
: out’ the androids. Clever snimstion by M.J. Allen. 
BREAKOUT. CCII pre..version of this venersble same. 


DISK 61 FORTRAN Utilitiesx (Comrlete) 

3-D OBJECT PLOT. Subroutines for obJect rotation end rlotting 
in a demo program. U. Van Putte. 

PLOT LIBRARY. BASIC plotting commands duinwenbaet to FORTRAN 80 
subroutines by J.J. Charles, 

PLOT LIBRARY DEMG. A clever demo, by J.J. Charlesy of his 
Plot subroutinese- Misht convert you to FORTRAN 80... 

*You can run the pre, erogrems & review the src. files on 
this. disk without having the comriler. 


aire T. Steffy 
10833 Brookside Drive 
Sun City, Arizona 85351 


July 10, 1982 


Ben Barlow 
161 Brookside Drive 
Rochester, N.Y. 14618 


Dear Ben: 


Leave it to someone else to find a possible booby trap in 
one of your programs! Tom Devlin reported that my '‘'Jumper' 
wouldn't 'Run' from a Menu. ‘I have several different menu 
programs here which seemed to e all right. The one he was 
using I had never seen befo e and has no name but it is a 
good one with several options... 


As it was one of those that wouldn't 'list' with the usual 
command, I had to do a little snooping around with Linden's 
gem, 'The Basic Editor'. I found a bunch of imbedded 
control codes and other esoteric stuff but the real culprit 
was that it left the keyboard locked up. 


To make 'Jumper' a little more foolproof, add these three 
lines in the startup routine after 'SHLD 80ACH': 


XRA A 
STA 81DFH ;KEYBOARD FLAG 
STA 81FEH ;KEYBOARD CHARACTER 


They are marked with an asterisk on the enclosed printout 
of the source code. 


I probably should have had these commands in the startup 
from the beginning but never noticed their absence as I 
usually hook ‘'Jumper' onto any program that goes into 
4000H. This takes care of the 'ins and outs'. 


Congratulations on your usual fine job on the latest issue 
(April-May) of 'COLORCUE'. I enjoy Dave Suits' stuff no 


end and he usually manages to remind me of something I have 
forgotten. 


Sincerely yours, 


er: 


Myron T. Steffy 


is 


; '‘JUMPER' ROUTINE FOR ADDITIONAL ESCAPE LOCATIONS 


: by Myron T. Steffy, Sun City, Arizona 85351 7/10/82 
READY EQU 81FFH 
ESCL EQU 053AH 
OSTR EQU 33F4H 
KEYTST EQU 0024H 
ORG OFDOOH 
START: LXI H,0OOH 
DAD SP 
SHLD FCSSP 
LXI SP,STACK 
MVI A,0C3H 
STA 81BFH 
LAI H,START 
SHLD 81C0H ;ESCAPE “~ (USER) 
LXI H,START-1 
SHLD 80ACH . ; PROTECT THIS PROGRAM 
XRA A 72 
STA 81DFH ;* KEYBOARD FLAG 
STA 81FEH ;@ KEYBOARD CHARACTER 
QUERY: LXI H,MSGO1 


CPI 27 ;ESCAPE ? 
JNZ QUEST 
CALL GETANS 
CPL op ;ESC T 8200H 
JZ 8200H 
CPI “ 7;ESC I 9000H 
JZ 9000H 
CPI "Ss: 7;ESC S AOQOOH 
JZ OAO000H 
CPI “pe ;ESC P 4000H 
JZ 4000H 
CPI nae 7ESC Z 4800H 
JZ 4800H 
CPI oN 7;ESC \ 50008 
JZ 5000H 
CPr rile 7ESC ] 5800H 
JZ 5800H 
CPI “yt 7;ESC U USER, EBOOH (DBUG32) 
JZ OEBOOH 
CPI nyt ;ESC V EOQOOH 
JZ OEOQOOH 
CPI 3 by 7;ESC [ FS500H 
JZ OF500H 
CPI “D* ;ESC D RETURN TO FCS 
JMP EXIT 
QUEST: CALL GTDOL 
STA NEWADR+2 ;LOW BYTE OF JUMP 
CALL GTDEST 
STA NEWADR+1 ;HIGH BYTE 


NEWADR: JMP EXIT 


GTDEST: CALL GETANS 


GTDO1: CALL LET ;FIRST CHARACTER OF BYTE 
RLC 
RLC 
RLC 
RLC ;MULTIPLY BY 16 
MOV B,A ;STORE IT TEMPORARILY 
CALL GETANS 
CALL LET 7SECOND CHARACTER OF BYTE 
ADD B 
RET 
LET: CPI Me odie 7;CHECK FOR HEX CHARACTER 
JNC DIG 
CPI ‘A’ . #LOW END OF HEX LETTERS 
CMC 
Jc FIXLET 
DIG: CPI 19! +1, ;CHECK FOR NUMERAL 
JNC ERMSG 
CPI ‘o' 7LOW END OF NUMERALS 
CMC 
Jc FIXDIG 
JMP ERMSG ;IF NONE OF THESE, ERROR! 
FIXLET: SUI 37H ;CONVERT ASCII TO ALPHABETIC 
RET 
FIXDIG: SUI 30H ;CONVERT ASCII TO DECIMAL 
RET 
GETANS: MVI A,32H ;WAIT FOR ONE CHARACTER 
STA READY 
GETCHA: CALL KEYTST 
JNZ GETCHA 
RET 
ERMSG: LXI H,MSGO2 ;PRINT ERROR MESSAGE 
CALL OSTR 
JMP QUERY 7START OVER 
EXIT: LXI H,MSGO3 


CALL OSTR 
LHLD FCSSP 


SPHL 
MVI A,44H 
JMP ESC1l 


MSGO1: DB 15,13,10,10,19,9,'ENTER ',21,'ESC ',18,‘plus ' 
DB ‘vector character ',17,9,'OR' 
DB 15,13,10,10,19,9,'ENTER JUMP ADDRESS IN HEX: ' 
DB 18,239 

MSGO2: DB 17,13,10,10,9,'ERROR, NOT A HEX DIGIT.',18,239 

MSGO3: DB 11,28,28,11,239 


FCSSP: DW 01H 
DS 40H 
STACK: 


END START 


CHIP MEMBER NAME 


NORMAN ADAMS 
TOM BOWLLAN 

JOE CHARLES 
CHUCK FINN 

ROSE GAGLIANO 
GEORGE HAUPT 
JIM JOHNSON 
DENNIS LEPARD 
JIM MANUELE 
ALAN MEGHRIG 
JIM MINOR 

BILL PARKER 

DON REINFELD 
WALLY RUST 
GEORGE SCHAFFER 
PHIL SIMON 
MYRON STEFFY 
DAVE SUITS 

JOHN THIRTLE 
DOUG VANPUTTE 
TOM WHITELEY 
DOUG PEEL 

DUAIN ESBENSHADE 
TOM DEVLIN 

PAUL THOMPSON 
W A SHANKS 

JIM IAK 

ART HORN 

MIKE WEINER 

P. KLINKHACHORN 
DAN STIEFLER 

F. FRANCO 
MAYNARD WILCOX 
MIKE EZZO 

JIM MAHLMEISTER 
GARRY CATTON 
STEVE PERRIGO 
DAVID NOWLIN 
TOM NAPIER 

TOM RYAN 

ARNOLD ANDERSON 
HOWARD ROSEN 
PAT COLLEY 

G. LILJEGREN 

L BIRNTIN 

BARRY HOLT 

BEN BARLOW 


Here's the latest list of CHIP members. 
acquaintances that you don't see above (who should be there, 


CITY, STATE 


ROCHESTER, NY 
ROCHESTER, NY 
HILTON, NY 
ROCHESTER, NY 
VICTOR, NY 
ROCHESTER, NY 
ELBA, NY 
BUFFALO, NY 
ROCHESTER, NY 
LAGUNA HILLS,CA 
ROCHESTER, NY 
FLINT, MICH. 
ROCHESTER, NY 
GREECE, NY 
BUFFALO, NY 
CINCINNATI, OHIO 
SUN CITY,ARIZ. 
ROCHESTER, NY 
ROCHESTER, NY 
ROCHESTER, NY 
ROCHESTER, NY 
ONTARIO, CANADA 
SILETZ,ORE. 
WATERFORD, MICH 
CHESTER, VA 
VICKSBURG, MS 
LIMA, NY 
SMYRNA, GA 
FAIRPORT, NY 
MORGANTOWN, WV 
BLASDELL, NY 
LIVINGSTON, NJ 
FRANKFORT, NY 
KALAMAZOO, MI 
FOUNTAIN VAL,CA 
BARTONVILLE, ILL 
HOUSTON, TEXAS 
WOODBRIDGE, VA 
MONSEY , NY 
ROCHESTER, NY 
LIVONIA, MICH 
HUNTINGDON VA,P 
BERKSHIRE, ENG.R 
183 42 TABY SWE 
FRANKFURT, GER 
VICTORIA, AUSTRA 
ROCHESTER, NY 


ZIP.# 


14618 
14612 
14468 
14626 
14564 
14617 
14058 
14210 
14615 
92653 
14624 
48504 
14618 
14616 
14212 
45224 
85351 
14618 
14622 
14624 
14625 
L3T4P 
97380 
48095 
23831 
39180 
14485 
30081 
14450 
26506 
14219 
07039 
13340 
49009 
92708 
61607 
77063 
22192 
10952 
14605 
48150 
A1900 
G4OSJ 
DEN 
90 
3052 
14618 


TELE. # 


2663141 
6631860 
3928152 
2258307 
2432090 
3422214 
7579213 


6214254 
8310834 
2477069 


2443428 
8651409 
8935956 
6815056 


4242525 
8894994 
5861629 
5 

4442469 
6231626 
5821507 


3771061 


6978596 
7816309 


4252641 
4546793 


6 


3475522 
3852969 


CHIP MEMBER NAME 


JOHN BELL 

MIKE CAPRON 
DALE DEWEY 
LARRY FOSTER 
IRVIN GILES 
FRED HUDSON 
WALT KAMMER 
DOUG LOOMIS 
ROBERT MASKREY 
HENRY METZLER 
TOM MONTEMARANO 
WILLIAM POWER 
JANE RICHARDSON 
ROGER SAFFORD 
ROY SHAFFER 
RICH SQUAILIA 
KEN STOWE 

RICH TAUBOLD 
ERIC TRUEHEART 
RICKI VICK 

TOM WULFF 

MIKE CHALUPKA 
GENE MCQUILLIN 
GORDON RUSCH 
JULIA EISENSMITH 
PAUL MCCARRON 
MARTIN REX 
GREGORY ALLEN 
DON ZEHL 
ROBERT SMITH 
FREDRIC HAERICH 
MARK STUMPF 
GEORGE HAUPT 
GLENN FAUST 
MIKE DEVITO 
GARY SIPPLE 
NORMAN JOHNSON 
PAUL DUDLEY 
JAMES KENNEY 
MIKE CARLSON 
JOHN POREMBA 
BRAD GOODRIDGE 
TERRY RICKARD 
KEN KERRISON 
TONY LEE 

GENE BAILEY 


forgot to pay their dues), give them a hint. 


CITY,STATE 


N. BERGEN, NJ 
WAYLAND, NY 
VICTOR, NY 
FAIRPORT, NY 
TOMS RIVER,NJ 
W.HENRIETTA, NY 
BUFFALO, NY 
TOLEDO, OHIO 
E.AURORA, NY 
ROCHESTER, NY 
ANNAPOLIS, MD 
NEW YORK, NY 
PITTSFORD, NY 
PERRY, NY 
BUFFALO GROV,IL 
ROCHESTER, NY 
NEWARK, NY 
ROCHESTER, NY 
PITTSFORD, NY 
MCLEAN, VA 
CHURCHVILLE, NY 
ONTARIO, CANADA 
TUCSON, ARIZONA 
BUFFALO, NY 
ORCHARD PARK, NY 
BELGRADE LAK,MA 
DENVER, COLORADO 
STILLWATER, MA 
PITTSFORD, NY 
NAPA,CA 
MAITLAND, FLA. 
NEW YORK, NY 
WEBSTER, NY 
MENDON, NY 
WALWORTH, NY 
SOUTHFIELD, MICH 
JOHNS ISLAND, SC 
PITTSFORD, NY 
BEAUMONT, TEXAS 
LEWISTON, IDAHO 
MAPLEWOOD , NJ 
ROCHESTER, NY 
AUSTRALIA 
PIALLIGO ACT 26 
ST.IVES, AUSTRAL 
ROCHESTER, NY 


ZIP.# 


07047 
14572 
14564 
14450 
08753 
14586 
14221 
43623 
14052 
14617 
21401 
10010 
14534 
14530 
60090 
14620 
14513 
14623 
14534 
22101 
14428 
NON1A 
85704 
14224 
14127 
04918 
80220 
04489 
14534 
94559 
32751 
10010 
14580 
14506 
14568 
48034 
29455 
14534 
77706 
83501 
07040 
14620 
3056 
c9 AU 
12075 
14625 


If you have neighbors or 
but 


TELE. # 


7282733 
9245565 
2236833 


3343951 
6323264 
4758086 
6525616 
5445483 


3816195 
2376371 
5416513 
4733371 
3345228 
5867906 
0) 

6748551 


4953850 
5731225 


5863787 


2240590 
8690864 


3819940 
9864563 


8667300 
7467216 


3809007 
STRALIA 
3814027 


ie 


LIRBER4TE YOUR COMPUCOLOR! 
Or: Everything You Always Wanted to Know bout 
Basic but Microsoft Wouldn't Tell You! 


Most readers are aware that Disk Basic and FCS 
live in read-onlv memory (30M). Some mav have 
worked with assembly code, but when one gets grand 
visions of writing 2 comeiler or Pac-Man game, 
the novice cringes with fear. Problem: how to 
access 311 those nifty routines that Basic uses? 
Neither Microsoft nor ISC suselies much document- 
ation regarding Basit's inner workings. Ideally, 
a good source listing of Basic would he available. 
Put waranoia reigns at uSoft; invaluable information 
i3 kewt secret, thus frustrating many eotential 
"0"*0-code hackers. 


If eerwle are interested, I wrowvose that we 
make available an accurate disassembly of Basic, 
including a cross-reference table of hex addresses. 
From this, it should be wossible to identify 
svecific routines and how to use them outside 
of Basic (e.g. I/0, floating woint routines). I 
guess members would share discoveries. If even 
a few members would like to work on such a esroject 

‘it might be feasible to have a sewarate newsletter 
(call it "ComeuPeeking," what else?) 


Ben Barlow has a trace srogram that sounds like 
a good start towards this goal. Presumably one 
could eventually develow a semi-comeiled Basic that 
might only need 3-4K user RAM, vet could run 
several times faster than normal Basic. 


All ideas are welcome! Ben Moser 
Rt. 2, Box 559 
Stanley, VA 22%51 


P.S.-- I might be able to "eubdlish" 2 newsletter 
and/or be a clesrinzhouse. Subscrietions would 
he shese.....? Just howe the Xerox machine in 


the town librarv doesn't break down..... 
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MICRO/PERSONAL/HOME COMPUTING 
Mailing Lists 


PERSONAL COMPUTING (55000, $40/thousand) People and organizations that 
own, use, buy, and sell personal computing products. Subcategories: 


TRS80 (8400, $50/k) Computer Stores (2100, $100) 
Apple (1700, $85) Publications (150, $10) 
PET (500, $30) Clubs (400, $25) 


Hands On! Newsletters (11000, $50/k) This newsletter is published by the Com- 
puter Resource Center. It catalogs new ideas and products for the education 
market. Users in universities, colleges, high schools, and elementary schools, 
mostly. ‘ 


BOOK BUYERS (4700, $50/k) People who have bought one or more computer 
related books. 

LOGO Users (624, $40) 

Computer Show Attendees (10500, $40/k) NYC & Boston 

80 MICROCOMPUTING Subscribers/Readers (3600, $50/k) 

BYTE Subscribers/Readers (3600, $50/k) 

CREATIVE COMPUTING Subscribers/Readers (1255, $75) 

INTERFACE AGE Subscribers/Readers (2140, $130) 

KILOBAUD Subscribers/Readers (6550, $50/k) 

TRS-80 Software Buyers (1900, $50/k) 


RADIO SHACK AUTHORIZED DEALERS (1750, $70) Stores that sell the TRS-80, 
and TRS-80 related products, from non-Radio Shack sources. MUST be sent by 
first class mail! 


ELECTRONICS TECHNOLOGY TEACHERS (1000, $60) These people buy micro 
products for teaching college, university, high school, and trade school elec- 
tronics courses. 


ENTERTAINMENT/PERSONAL/BUSINESS Software Buyers (62000, $60/k) 
Buyers & Inquiries of entertainment, personal, and business software. 
Subcategories: 

TRS-80 (30000, $60/k) TRS-80 owner software buyers. 

Apple (5000, $60/k) Apple owner software buyers. 

Atari (3000, $60/k) Atari owner software buyers. 

TRS-80 & Apple Programmers (2500, $125) 


The above lists can be ordered from: RESOURCES, Box 134, Harvard Square, 
Cambridge MA 02238. For COD, Visa or Mastercharge orders call 617/876-2789 
or 617/492-8713. Most orders will be shipped the next day, by first class mail. 


July 1, 1982 


If you are interested in starting a business, and need some 
customers, this may be a place to find them. If you want to start 
a newsletter, this may be a good source for an initial mailing. 


Zt 


Add your name to the 


MICRO/PERSONAL/HOME COMPUTING 
Mailing list! 


| own/use/will buy the following computer(s): 


QO TRS-80 O PET QC Apple OC Atari OC NorthStar COS! OIBM 
O Xerox OHP QODEC O Sinclair O Osborne OCP/M O UNIX 
O S-100 O Heath O Vector Graphic 
O Other 
| read/subscribe to the following publication(s): 
O BYTE OQ InterfaceAge CO Creative Computing © Gompute! 
O InfoWorld © ComputerWorld O Personal Computing O Kilobaud 
O 80 Microcomputing © BCS Update 
O Other 
O Send a FREE sample copy of HANDS ON! Newsletter. 
Oj Send complete information about selling my programs through the 
Software Clearinghouse. 
OC Send acopy of your complete mailing list cataglog. 
O Send information about how you can automate and sell my mailing list. 
O Send information about how | can trade mailing lists with you and other list 
owners. 
Your Name: 


Address: 


(zip code required) 


O Add my name to the Micro/Personal/Home Computing Directory. | 
understand people may contact me about the computer | own/use in my 
home/business. 


Telephone: ( ) 


O Send me asample copy of the Micro/Personal/Home Computing Resources 
Newsletter. Enclosed is $1. 


O Enclosed is $10. Send me the next 10 issues of the Micro/Personal/Home 
Computing Resources Newsletter. 
RESOURCES, Box 134, Cambridge MA 02238. 


On the other hand, if you want to receive mail, fill out and mail 
this form to have your name added to one or more of the lists 
listed on the preceeding page. (I got this information in the 
mail, addressed to the Group, and thought it may be of interest.) 


Zo 


See exhibits and demonstrations by stores, manufacturers, software houses, 
clubs, professional societies, and individuals. 


Attend seminars on the use of computers in education, business, and the home. 
Get your hands on a computer! : a9. 
Everyone welcome. Registration: only 50¢ per person. 


Rochestar-area computer groups) 


Presented by Computer Access (the f Ro 
G of Education and Human Development. 


and the University of Rochester Gra 


hen Advertising Executive Todd 

Lief, 47, gave up his four-pack-a- 
day cigarette habit a few years ago, he put 
aside his tobacco money to buy an Apple 
computer. His wife Jo, 44, a Chicago fam- 
ily therapist, supported the idea. At least 
at first. Then she discovered that comput- 
ers, like cigarettes, can be habit forming. 
“He really got into it,” she says. “After a 
while, I felt angry—abandoned. On a sun- 
ny, beautiful day he would sit at the com- 
puter for eight hours straight.” 

Fortunately, Jo has been able to adjust 
to her husband’s obsession. While Todd 
fiddles with the keyboard, she goes out 
with friends, gabs on the phone 
or just immerses herself in a 
bubble bath. Says she: “It gives 
me more time to do what I 
want to do. I’m glad to have 
the independence.” But their 
case may be a happy excep- 
tion. Throughout the nation, 
thousands of couples who have 
survived Monday Night Foot- 
bail, jogging and the ERA de- 
bate are facing a trickier chai- 
lenge. The computer that they 
were told would bring the fam- 
ily closer together may now be 
driving them apart. Says San 
Diego Psychologist Thomas 
McDonald: “They’re begin- 
ning to realize they’re losing 
their spouses to a machine.” 

McDonald has_ seen 
enough computer-related dis- 
tress in the past two years to 
design psychological tests to sell to com- 
panies that want to spot victims of the 
new ailment. According to McDonald, 
the sufferers are trying to keep up with 
machines that never sleep and never devi- 
ate from perfect linear logic. “Since hu- 
man relations are neither linear nor logi- 
cal,” he says, “they grow increasingly 
isolated from their families and the whole 
feeling world.” 

The complaint strikes hardest among 
top programmers and systems managers. 
Among the first signs: a cavalier attitude 
toward 'eating schedules and a leaning to- 
ward late-night emergencies at the office. 
“Often I’d tell my wife I’'d be home for 
dinner at 5 o’clock, but the next thing I 
knew, it was 8,” recalls Bob Fagan, a San 
Diego data-processing professional. “I 
was so locked into the technology, so out 
of touch with the emotional part of mar- 
riage, that when we finally separated, it 
was like a freight train coming through 
our living room. I was not prepared.” 

At times, Connie Washam, 32, has 
nearly given up on her husband Gary, 
marketing director for a San Diego com- 


80 


Computers 


The Real Apple of His Eye 


How families come apart in the face of the micro invasion 


puter graphics firm. “We don’t plan on 
him for dinner,” she says. “We don’t plan 
on him for anything. He’s kind of a drop- 
in guest.” Says Gary in his defense: “I’m 
in a double bind. The computer gives me 
immediate rewards. I get positive strokes 
every time I solve a problem. On the other 
hand, I enjoy being with my family. But if 
you spend too much time with them, you 
lose your edge in the computer industry.” 
Jerry Gallagher of White Plains, 
N.Y., finds himself, at 48, in the midst of 
divorce proceedings. He has been married 
21 years, is the father of three children 
and vice president of a company that 


makes portable computers. He feels the 
complexity of the technology contributed 
to his alienation from his family: “It both- 
ers me when I tell my wife we can go to 
256K bytes of memory and it means noth- 
ing to her. I don’t want to be sexist, but 
women don’t understand.” 

Surprisingly, Gallagher’s analysis is 
shared by many professionals. “Comput- 
ers and video games are clearly sexist,” 
says Stanford Psychologist Philip Zim- 
bardo. “The programs feed into the 
learned differences between men and 
women, like mathematics and engineer- 
ing.” Zimbardo believes that increased 
sales of home computers could spread ad- 
diction and its attendant vexations. “As 
more people get involved with computers 
in their everyday lives,” he warns, “we are 
likely to see more of these problems in the 
general population.” 

Right now there are almost 2 million 
personal and home computers in the U.S., 
and manufacturers will ship nearly 2 mil- 
lion more this year. One company alone, 


Timex, is turning out copies of its $99.95 | 


computer at the rate of one machine every 


ten seconds. As a rule of thumb, Colum- 
nist Art Buchwald has suggested, ‘For ev- 
ery home computer sold in America, 
there is a computer widow somewhere.” 
“Sports widow, computer widow, you 
name it, that’s me,” says Actress Elaine 
Grant, 25. Three months ago, her hus- 
band brought home a $250 Commodore 
VIC 20. “I have to laugh sometimes,” she 
says. “When friends come, Jerry immedi- 
ately drags them over to show them the 
computer. Some may actually understand 
what’s going on, but most just stand there 
and smile and can’t wait to get away.” 
Jerry, 42, a violinist with the Boston Sym- 
phony Orchestra, and his son David, 9, 
now while away the hours playing games, 
composing music and deciphering com- 
plex programs. “Jerry has begged me to 
show some interest,” Elaine confesses, 
“but I can’t. It’s ugly. It makes obnoxious 
soeteoporescu noises. It has about 80 zillion 
things stuck to the back of the 
TV. Hair dryers self-destruct 
in my hands, so why should I 
touch the computer?” 

Many women, rather than 
join the computer revolution, 
have hammered out peace 
pacts with their mates. In Palo 
Alto, Calif, a woman who 
spent five years with an Atari 
programmer finally imposed a 
15-minute limit on uninter- 
rupted talk about his work. In 
Atlanta the wife of a former 
camera bug who switched to 
home computers uses travel to 
protect their relationship. Says 
she: “I insist that we go to our 
place at the lake every week- 
end to get him away from the 
computer.” 

That would not have 
stopped Bart Voyce. He takes his portable 
computer nearly everywhere, from a New 
Year’s Eve party to the roof of his New- 
ark apartment building, where he mixes 
programming with nude sunbathing. He 
threatened to bring it along on his honey- 
moon. “I’m kind of patient,” says Lisa, 
his wife of two months, “but after a while, 
it gets annoying. He’ll be programming 
for hours, and I’ll be staring at his back. I 
finally got involved in computers just to 
keep up. You can’t let a machine come 
between you.” 

Says Stanford’s Zimbardo: “As 
corny as it sounds, we need to re-estab- 
lish family rituals, such as family meals 
with meaningful conversation.” Even 
the most hard-nosed software freak will 
agree in principle, but sometimes it is 
not easy. “I’d sell my computer before 
I'd sell my children,” deadpans Atlantic 
Monthly Editor James Fallows, who 
happily traded in his typist for his word 
processor, “but the kids better watch 
their step.” 


—By Philip Fatlick. 


Reported by Robert T. Grieves/New York and | 


Joseph Pilcher/Los Angeles 


ie 
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TIME, AUGUST 30, 1982 


MINERVA MICROWARE 
Compucolor Software and Hardware Specialists 
Presents 
MicroSynth 


three voice musical synthesizer 


* plugs into CCII 50 pin bus and any amplifier 
* cable provided 


* independent tone generator, white noise generator and volume 
control on each channel 


* noise filter and envelope generator 
* easily expandable to six, nine, or twelve voice operation 


* MicroMuse music editor allows music to be typed in and played 
back immediately . 


* time signature selection and complete control over tempo 
* sharp or flat notation 


* music files can be saved on disk for later playing or editing 


* music programs can easily be loaded and played from user 
written programs 


* interrupt driven software allows music to be played while other 
programs are running 


* sample programs and complete documentation included 
* requires 32K RAM and expanded keyboard 


* free air delivery anywhere 


* # # & * * COMPLETE SYSTEM $250.00 eee FFF 
Available from: 


MINERVA MICROWARE 
9743 Kensington Road 
South Yarra 3141 
AUSTRALIA 


Phone (03) 241-7094 : 
(All funds must be remitted in Australian dollars.) 
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